home *** CD-ROM | disk | FTP | other *** search
/ Great Canadian Scientists / GCS_CD.iso / mac / PC / GCSData / atom_g.dxr / 00004_Resets Sliders.ls < prev    next >
Encoding:
Text File  |  1996-09-01  |  1.5 KB  |  64 lines
  1. on exitFrame
  2.   global Energy, Angle
  3.   set the puppet of sprite 6 to 1
  4.   set the puppet of sprite 7 to 1
  5.   set the puppet of sprite 8 to 1
  6.   if Energy = "0" then
  7.     set the locH of sprite 12 to 140
  8.   end if
  9.   if Energy = "1" then
  10.     set the locH of sprite 12 to 201
  11.   end if
  12.   if Energy = "2" then
  13.     set the locH of sprite 12 to 262
  14.   end if
  15.   if Energy = "3" then
  16.     set the locH of sprite 12 to 323
  17.   end if
  18.   if Energy = "4" then
  19.     set the locH of sprite 12 to 384
  20.   end if
  21.   if Energy = "5" then
  22.     set the locH of sprite 12 to 445
  23.   end if
  24.   if Energy = "6" then
  25.     set the locH of sprite 12 to 506
  26.   end if
  27.   if Angle = "00" then
  28.     set the locH of sprite 13 to 138
  29.   end if
  30.   if Angle = "05" then
  31.     set the locH of sprite 13 to 179
  32.   end if
  33.   if Angle = "10" then
  34.     set the locH of sprite 13 to 220
  35.   end if
  36.   if Angle = "15" then
  37.     set the locH of sprite 13 to 261
  38.   end if
  39.   if Angle = "20" then
  40.     set the locH of sprite 13 to 302
  41.   end if
  42.   if Angle = "25" then
  43.     set the locH of sprite 13 to 343
  44.   end if
  45.   if Angle = "30" then
  46.     set the locH of sprite 13 to 384
  47.   end if
  48.   if Angle = "35" then
  49.     set the locH of sprite 13 to 425
  50.   end if
  51.   if Angle = "40" then
  52.     set the locH of sprite 13 to 466
  53.   end if
  54.   if Angle = "45" then
  55.     set the locH of sprite 13 to 507
  56.   end if
  57.   set the mouseDownScript to EMPTY
  58.   set the mouseUpScript to "Lock"
  59.   set the keyDownScript to EMPTY
  60.   repeat with count = 12 to 13
  61.     set the constraint of sprite count to count + 2
  62.   end repeat
  63. end
  64.